home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / wb / czesc_2 / iconextras / rexx / deleteicon.rexx next >
OS/2 REXX Batch file  |  1995-01-15  |  300b  |  9 lines
  1. /* deletes icon of given file/directory */
  2. parse arg filename
  3. address command
  4. filename=strip(filename,'B','"')   /* remove quotes */
  5. filename=strip(filename)           /* remove spaces */
  6. filename=strip(filename,'T','/')   /* Finally, remove trailing slash */
  7. 'deleteicon' """"filename".info"""
  8. exit
  9.